/**
 * ��ʱ���� Ϊ�˱����������
 */
package labox.innovation.gameserver.communitybbs.Manager;

import java.util.Collections;
import java.util.Comparator;
import java.util.StringTokenizer;
import java.util.logging.Level;
import java.util.logging.LogRecord;

import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import javolution.util.FastList;
import javolution.util.FastMap;
import labox.innovation.config.Config;
import labox.innovation.gameserver.GameServer;
import labox.innovation.gameserver.datatables.Experience;
import labox.innovation.gameserver.model.BlockList;
import labox.innovation.gameserver.model.FuzeWorld;
import labox.innovation.gameserver.model.Scene;
import labox.innovation.gameserver.model.actor.instance.FuzePcInstance;
import labox.innovation.gameserver.network.SystemMessageId;
import labox.innovation.gameserver.network.clientpackets.Say2;
import labox.innovation.gameserver.network.serverpackets.CreatureSay;
//import labox.innovation.gameserver.network.serverpackets.ShowBoard;
import labox.innovation.gameserver.network.serverpackets.SystemMessage;
import labox.innovation.gameserver.util.StringUtil;

public class RegionBBSManager extends BaseBBSManager {
	private static Logger _logChat = LoggerFactory.getLogger("chat");

	private RegionBBSManager() {
	}

	/**
	 * 
	 * @see labox.innovation.gameserver.communitybbs.Manager.BaseBBSManager#parsecmd(java.lang.String, labox.innovation.gameserver.model.actor.instance.FuzePcInstance)
	 */
	@Override
	public void parsecmd(String command, FuzePcInstance activeChar) {
		if (command.equals("_bbsloc")) {
			showOldCommunity(activeChar, 1);
		} else if (command.startsWith("_bbsloc;page;")) {
			StringTokenizer st = new StringTokenizer(command, ";");
			st.nextToken();
			st.nextToken();
			int page = 0;
			try {
				page = Integer.parseInt(st.nextToken());
			} catch (NumberFormatException nfe) {
			}

			showOldCommunity(activeChar, page);
		} else if (command.startsWith("_bbsloc;playerinfo;")) {
			StringTokenizer st = new StringTokenizer(command, ";");
			st.nextToken();
			st.nextToken();
			String name = st.nextToken();

			showOldCommunityPI(activeChar, name);
		} else {
			if (Config.COMMUNITY_TYPE == 1) {
				showOldCommunity(activeChar, 1);
			} else {
//				ShowBoard sb = new ShowBoard("<html><body><br><br><center>the command: " + command + " is not implemented yet</center><br><br></body></html>", "101");
//				activeChar.sendPacket(sb);
//				activeChar.sendPacket(new ShowBoard(null, "102"));
//				activeChar.sendPacket(new ShowBoard(null, "103"));
			}
		}
	}

	/**
	 * @param activeChar
	 * @param name
	 */
	private void showOldCommunityPI(FuzePcInstance activeChar, String name) {
		final StringBuilder htmlCode = StringUtil.startAppend(1000, "<html><body><br>" + "<table border=0><tr><td FIXWIDTH=15></td><td align=center>L2J Community Board<img src=\"sek.cbui355\" width=610 height=1></td></tr><tr><td FIXWIDTH=15></td><td>");
		FuzePcInstance player = null;

		if (player != null) {
			String sex = "Male";
//			if (player.getAppearance().getSex()) {
//				sex = "Female";
//			}
			String levelApprox = "low";
			if (player.getLevel() >= 60)
				levelApprox = "very high";
			else if (player.getLevel() >= 40)
				levelApprox = "high";
			else if (player.getLevel() >= 20)
				levelApprox = "medium";

			StringUtil.append(htmlCode, "<table border=0><tr><td>", player.getName(), " (", sex, " ", player.getTemplate().className, "):</td></tr>" + "<tr><td>Level: ", levelApprox, "</td></tr>" + "<tr><td><br></td></tr>");

			if (activeChar != null && (activeChar.isGM() || player.getObjectId() == activeChar.getObjectId() || Config.SHOW_LEVEL_COMMUNITYBOARD)) {
				long nextLevelExp = 0;
				long nextLevelExpNeeded = 0;
				if (player.getLevel() < (Experience.MAX_LEVEL - 1)) {
					nextLevelExp = Experience.LEVEL[player.getLevel() + 1];
					nextLevelExpNeeded = nextLevelExp - player.getExp();
				}

				StringUtil.append(htmlCode, "<tr><td>Level: ", String.valueOf(player.getLevel()), "</td></tr>" + "<tr><td>Experience: ", String.valueOf(player.getExp()), "/", String.valueOf(nextLevelExp), "</td></tr>" + "<tr><td>Experience needed for level up: ", String.valueOf(nextLevelExpNeeded), "</td></tr>" + "<tr><td><br></td></tr>");
			}

			int uptime = (int) player.getUptime() / 1000;
			int h = uptime / 3600;
			int m = (uptime - (h * 3600)) / 60;
			int s = ((uptime - (h * 3600)) - (m * 60));

			StringUtil.append(htmlCode, "<tr><td>Uptime: ", String.valueOf(h), "h ", String.valueOf(m), "m ", String.valueOf(s), "s</td></tr>" + "<tr><td><br></td></tr>");

			if (player.getClan() != null) {
				StringUtil.append(htmlCode, "<tr><td>Clan: ", player.getClan().getName(), "</td></tr>" + "<tr><td><br></td></tr>");
			}

			StringUtil.append(htmlCode, "<tr><td><multiedit var=\"pm\" width=240 height=40><button value=\"Send PM\" action=\"Write Region PM ", player.getName(), " pm pm pm\" width=110 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td></tr><tr><td><br><button value=\"Back\" action=\"bypass _bbsloc\" width=40 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td></tr></table>" + "</td></tr></table>" + "</body></html>");
			separateAndSend(htmlCode.toString(), activeChar);
		} else {
//			ShowBoard sb = new ShowBoard(StringUtil.concat("<html><body><br><br><center>No player with name ", name, "</center><br><br></body></html>"), "101");
//			activeChar.sendPacket(sb);
//			activeChar.sendPacket(new ShowBoard(null, "102"));
//			activeChar.sendPacket(new ShowBoard(null, "103"));
		}
	}

	/**
	 * @param activeChar
	 */
	private void showOldCommunity(FuzePcInstance activeChar, int page) {
		separateAndSend(getCommunityPage(page, activeChar.isGM() ? "gm" : "pl"), activeChar);
	}

	/* (non-Javadoc)
	 * @see labox.innovation.gameserver.communitybbs.Manager.BaseBBSManager#parsewrite(java.lang.String, java.lang.String, java.lang.String, java.lang.String, java.lang.String, labox.innovation.gameserver.model.actor.instance.L2PcInstance)
	 */
	@Override
	public void parsewrite(String ar1, String ar2, String ar3, String ar4, String ar5, FuzePcInstance activeChar) {
		if (activeChar == null)
			return;

		if (ar1.equals("PM")) {
			final StringBuilder htmlCode = StringUtil.startAppend(500, "<html><body><br>" + "<table border=0><tr><td FIXWIDTH=15></td><td align=center>L2J Community Board<img src=\"sek.cbui355\" width=610 height=1></td></tr><tr><td FIXWIDTH=15></td><td>");

			try {

				FuzePcInstance receiver = null;
				if (receiver == null) {
					StringUtil.append(htmlCode, "Player not found!<br><button value=\"Back\" action=\"bypass _bbsloc;playerinfo;", ar2, "\" width=40 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\">" + "</td></tr></table></body></html>");
					separateAndSend(htmlCode.toString(), activeChar);
					return;
				}
				if (Config.JAIL_DISABLE_CHAT && receiver.getPunish().isInJail()) {
					activeChar.sendMessage("Player is in jail.");
					return;
				}
				if (receiver.getPunish().isChatBanned()) {
					activeChar.sendMessage("Player is chat banned.");
					return;
				}
				if (activeChar.getPunish().isInJail() && Config.JAIL_DISABLE_CHAT) {
					activeChar.sendMessage("You can not chat while in jail.");
					return;
				}
				if (activeChar.getPunish().isChatBanned()) {
					activeChar.sendMessage("You are banned from using chat");
					return;
				}

				if (Config.LOG_CHAT) {
					_logChat.info("chat {} tell {}", ar3, "[" + activeChar.getName() + " to " + receiver.getName() + "]");
				}
				CreatureSay cs = new CreatureSay(activeChar.getObjectId(), Say2.SECRET_CHANNAL, activeChar.getName(), ar3);
				if (receiver != null && !BlockList.isBlocked(receiver, activeChar)) {
					if (!receiver.getMessageRefusal()) {
						receiver.sendPacket(cs);
						activeChar.sendPacket(new CreatureSay(activeChar.getObjectId(), Say2.SECRET_CHANNAL, "->" + receiver.getName(), ar3));
						StringUtil.append(htmlCode, "Message Sent<br><button value=\"Back\" action=\"bypass _bbsloc;playerinfo;", receiver.getName(), "\" width=40 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\">" + "</td></tr></table></body></html>");
						separateAndSend(htmlCode.toString(), activeChar);
					} else {
						SystemMessage sm = new SystemMessage(SystemMessageId.THE_PERSON_IS_IN_MESSAGE_REFUSAL_MODE);
						activeChar.sendPacket(sm);
						parsecmd("_bbsloc;playerinfo;" + receiver.getName(), activeChar);
					}
				} else {
					SystemMessage sm = new SystemMessage(SystemMessageId.S1_IS_NOT_ONLINE);
					sm.addString(receiver.getName());
					activeChar.sendPacket(sm);
					sm = null;
				}
			} catch (StringIndexOutOfBoundsException e) {
				// ignore
			}
		} else {
//			ShowBoard sb = new ShowBoard(StringUtil.concat("<html><body><br><br><center>the command: ", ar1, " is not implemented yet</center><br><br></body></html>"), "101");
//			activeChar.sendPacket(sb);
//			activeChar.sendPacket(new ShowBoard(null, "102"));
//			activeChar.sendPacket(new ShowBoard(null, "103"));
		}

	}

	private int _onlineCount = 0;

	private int _onlineCountGm = 0;

	private static FastMap<Integer, FastList<FuzePcInstance>> _onlinePlayers = new FastMap<Integer, FastList<FuzePcInstance>>().shared();

	private static FastMap<Integer, FastMap<String, String>> _communityPages = new FastMap<Integer, FastMap<String, String>>().shared();

	/**
	 * @return
	 */
	public static RegionBBSManager getInstance() {
		return SingletonHolder._instance;
	}

	public synchronized void changeCommunityBoard() {
		FastList<FuzePcInstance> sortedPlayers = new FastList<FuzePcInstance>();

		sortedPlayers.addAll(FuzeWorld.getInstance().getAllPlayers().values());

		Collections.sort(sortedPlayers, new Comparator<FuzePcInstance>() {
			public int compare(FuzePcInstance p1, FuzePcInstance p2) {
				return p1.getName().compareToIgnoreCase(p2.getName());
			}
		});

		_onlinePlayers.clear();
		_onlineCount = 0;
		_onlineCountGm = 0;

		for (FuzePcInstance player : sortedPlayers) {
			addOnlinePlayer(player);
		}

		_communityPages.clear();
		writeCommunityPages();
	}

	private void addOnlinePlayer(FuzePcInstance player) {
		boolean added = false;

		for (FastList<FuzePcInstance> page : _onlinePlayers.values()) {
			if (page.size() < Config.NAME_PAGE_SIZE_COMMUNITYBOARD) {
				if (!page.contains(player)) {
					page.add(player);
					if (!player.getAppearance().getInvisible())
						_onlineCount++;
					_onlineCountGm++;
				}
				added = true;
				break;
			} else if (page.contains(player)) {
				added = true;
				break;
			}
		}

		if (!added) {
			FastList<FuzePcInstance> temp = new FastList<FuzePcInstance>();
			int page = _onlinePlayers.size() + 1;
			if (temp.add(player)) {
				_onlinePlayers.put(page, temp);
				if (!player.getAppearance().getInvisible())
					_onlineCount++;
				_onlineCountGm++;
			}
		}
	}

	private void writeCommunityPages() {
		final StringBuilder htmlCode = new StringBuilder(2000);
		final String tdClose = "</td>";
		final String tdOpen = "<td align=left valign=top>";
		final String trClose = "</tr>";
		final String trOpen = "<tr>";
		final String colSpacer = "<td FIXWIDTH=15></td>";

		for (int page : _onlinePlayers.keySet()) {
			FastMap<String, String> communityPage = new FastMap<String, String>();
			htmlCode.setLength(0);
//			StringUtil.append(htmlCode, "<html><body><br>" + "<table>" + trOpen + "<td align=left valign=top>Server Restarted: ", String.valueOf(GameServer.dateTimeServerStarted.getTime()), tdClose + trClose + "</table>" + "<table>" + trOpen + tdOpen + "XP Rate: x", String.valueOf(Config.RATE_XP), tdClose + colSpacer + tdOpen + "Party XP Rate: x", String.valueOf(Config.RATE_XP * Config.RATE_PARTY_XP), tdClose + colSpacer + tdOpen + "XP Exponent: ", String.valueOf(Config.ALT_GAME_EXPONENT_XP), tdClose + trClose + trOpen + tdOpen + "SP Rate: x", String.valueOf(Config.RATE_SP), tdClose + colSpacer + tdOpen + "Party SP Rate: x", String.valueOf(Config.RATE_SP * Config.RATE_PARTY_SP), tdClose + colSpacer + tdOpen + "SP Exponent: ", String.valueOf(Config.ALT_GAME_EXPONENT_SP), tdClose + trClose + trOpen + tdOpen + "Drop Rate: ", String.valueOf(Config.RATE_DROP_ITEMS), tdClose + colSpacer + tdOpen + "Spoil Rate: ", String.valueOf(Config.RATE_DROP_SPOIL), tdClose + colSpacer + tdOpen
//					+ "Adena Rate: ", String.valueOf(Config.RATE_DROP_ADENA), tdClose + trClose + "</table>" + "<table>" + trOpen + "<td><img src=\"sek.cbui355\" width=600 height=1><br></td>" + trClose + trOpen + tdOpen, String.valueOf(FuzeWorld.getInstance().getAllVisibleObjectsCount()), " Object count</td>" + trClose + trOpen + tdOpen, String.valueOf(getOnlineCount("gm")), " Player(s) Online</td>" + trClose + "</table>");

			int cell = 0;
			if (Config.BBS_SHOW_PLAYERLIST) {
				htmlCode.append("<table border=0><tr><td><table border=0>");

				for (FuzePcInstance player : getOnlinePlayers(page)) {
					cell++;

					if (cell == 1) {
						htmlCode.append(trOpen);
					}

					StringUtil.append(htmlCode, "<td align=left valign=top FIXWIDTH=110><a action=\"bypass _bbsloc;playerinfo;", player.getName(), "\">");

					if (player.isGM()) {
						StringUtil.append(htmlCode, "<font color=\"LEVEL\">", player.getName(), "</font>");
					} else {
						htmlCode.append(player.getName());
					}

					htmlCode.append("</a></td>");

					if (cell < Config.NAME_PER_ROW_COMMUNITYBOARD)
						htmlCode.append(colSpacer);

					if (cell == Config.NAME_PER_ROW_COMMUNITYBOARD) {
						cell = 0;
						htmlCode.append(trClose);
					}
				}
				if (cell > 0 && cell < Config.NAME_PER_ROW_COMMUNITYBOARD) {
					htmlCode.append(trClose);
				}

				htmlCode.append("</table><br></td></tr>" + trOpen + "<td><img src=\"sek.cbui355\" width=600 height=1><br></td>" + trClose + "</table>");
			}

			if (getOnlineCount("gm") > Config.NAME_PAGE_SIZE_COMMUNITYBOARD) {
				htmlCode.append("<table border=0 width=600><tr>");
				if (page == 1) {
					htmlCode.append("<td align=right width=190><button value=\"Prev\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				} else {
					StringUtil.append(htmlCode, "<td align=right width=190><button value=\"Prev\" action=\"bypass _bbsloc;page;", String.valueOf(page - 1), "\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				}

				StringUtil.append(htmlCode, "<td FIXWIDTH=10></td>" + "<td align=center valign=top width=200>Displaying ", String.valueOf(((page - 1) * Config.NAME_PAGE_SIZE_COMMUNITYBOARD) + 1), " - ", String.valueOf(((page - 1) * Config.NAME_PAGE_SIZE_COMMUNITYBOARD) + getOnlinePlayers(page).size()), " player(s)</td>" + "<td FIXWIDTH=10></td>");
				if (getOnlineCount("gm") <= (page * Config.NAME_PAGE_SIZE_COMMUNITYBOARD)) {
					htmlCode.append("<td width=190><button value=\"Next\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				} else {
					StringUtil.append(htmlCode, "<td width=190><button value=\"Next\" action=\"bypass _bbsloc;page;", String.valueOf(page + 1), "\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				}
				htmlCode.append("</tr></table>");
			}

			htmlCode.append("</body></html>");

			communityPage.put("gm", htmlCode.toString());

			htmlCode.setLength(0);
//			StringUtil.append(htmlCode, "<html><body><br>" + "<table>" + trOpen + "<td align=left valign=top>Server Restarted: ", String.valueOf(GameServer.dateTimeServerStarted.getTime()), tdClose + trClose + "</table>" + "<table>" + trOpen + tdOpen + "XP Rate: ", String.valueOf(Config.RATE_XP), tdClose + colSpacer + tdOpen + "Party XP Rate: ", String.valueOf(Config.RATE_PARTY_XP), tdClose + colSpacer + tdOpen + "XP Exponent: ", String.valueOf(Config.ALT_GAME_EXPONENT_XP), tdClose + trClose + trOpen + tdOpen + "SP Rate: ", String.valueOf(Config.RATE_SP), tdClose + colSpacer + tdOpen + "Party SP Rate: ", String.valueOf(Config.RATE_PARTY_SP), tdClose + colSpacer + tdOpen + "SP Exponent: ", String.valueOf(Config.ALT_GAME_EXPONENT_SP), tdClose + trClose + trOpen + tdOpen + "Drop Rate: ", String.valueOf(Config.RATE_DROP_ITEMS), tdClose + colSpacer + tdOpen + "Spoil Rate: ", String.valueOf(Config.RATE_DROP_SPOIL), tdClose + colSpacer + tdOpen + "Adena Rate: ", String
//					.valueOf(Config.RATE_DROP_ADENA), tdClose + trClose + "</table>" + "<table>" + trOpen + "<td><img src=\"sek.cbui355\" width=600 height=1><br></td>" + trClose + trOpen + tdOpen, String.valueOf(getOnlineCount("pl")), " Player(s) Online</td>" + trClose + "</table>");

			if (Config.BBS_SHOW_PLAYERLIST) {
				htmlCode.append("<table border=0><tr><td><table border=0>");

				cell = 0;
				for (FuzePcInstance player : getOnlinePlayers(page)) {
					if ((player == null) || (player.getAppearance().getInvisible()))
						continue; // Go to next

					cell++;

					if (cell == 1) {
						htmlCode.append(trOpen);
					}

					StringUtil.append(htmlCode, "<td align=left valign=top FIXWIDTH=110><a action=\"bypass _bbsloc;playerinfo;", player.getName(), "\">");

					if (player.isGM()) {
						StringUtil.append(htmlCode, "<font color=\"LEVEL\">", player.getName(), "</font>");
					} else {
						htmlCode.append(player.getName());
					}

					htmlCode.append("</a></td>");

					if (cell < Config.NAME_PER_ROW_COMMUNITYBOARD)
						htmlCode.append(colSpacer);

					if (cell == Config.NAME_PER_ROW_COMMUNITYBOARD) {
						cell = 0;
						htmlCode.append(trClose);
					}
				}
				if (cell > 0 && cell < Config.NAME_PER_ROW_COMMUNITYBOARD)
					htmlCode.append(trClose);

				htmlCode.append("</table><br></td></tr>" + trOpen + "<td><img src=\"sek.cbui355\" width=600 height=1><br></td>" + trClose + "</table>");
			}

			if (getOnlineCount("pl") > Config.NAME_PAGE_SIZE_COMMUNITYBOARD) {
				htmlCode.append("<table border=0 width=600><tr>");

				if (page == 1) {
					htmlCode.append("<td align=right width=190><button value=\"Prev\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				} else {
					StringUtil.append(htmlCode, "<td align=right width=190><button value=\"Prev\" action=\"bypass _bbsloc;page;", String.valueOf(page - 1), "\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				}

				StringUtil.append(htmlCode, "<td FIXWIDTH=10></td>" + "<td align=center valign=top width=200>Displaying ", String.valueOf(((page - 1) * Config.NAME_PAGE_SIZE_COMMUNITYBOARD) + 1), " - ", String.valueOf(((page - 1) * Config.NAME_PAGE_SIZE_COMMUNITYBOARD) + getOnlinePlayers(page).size()), " player(s)</td>" + "<td FIXWIDTH=10></td>");

				if (getOnlineCount("pl") <= (page * Config.NAME_PAGE_SIZE_COMMUNITYBOARD)) {
					htmlCode.append("<td width=190><button value=\"Next\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				} else {
					StringUtil.append(htmlCode, "<td width=190><button value=\"Next\" action=\"bypass _bbsloc;page;", String.valueOf(page + 1), "\" width=50 height=15 back=\"L2UI_ct1.button_df\" fore=\"L2UI_ct1.button_df\"></td>");
				}

				htmlCode.append("</tr></table>");
			}

			htmlCode.append("</body></html>");

			communityPage.put("pl", htmlCode.toString());

			_communityPages.put(page, communityPage);
		}
	}

	private int getOnlineCount(String type) {
		if (type.equalsIgnoreCase("gm"))
			return _onlineCountGm;
		else
			return _onlineCount;
	}

	private FastList<FuzePcInstance> getOnlinePlayers(int page) {
		return _onlinePlayers.get(page);
	}

	public String getCommunityPage(int page, String type) {
		if (_communityPages.get(page) != null)
			return _communityPages.get(page).get(type);
		else
			return null;
	}

	@SuppressWarnings("synthetic-access")
	private static class SingletonHolder {
		protected static final RegionBBSManager _instance = new RegionBBSManager();
	}
}